home *** CD-ROM | disk | FTP | other *** search
/ Visual Basic Controls / Visual Basic Controls.iso / vbcontrol / intmail2 / timemain.dfm / timemain.txt
Encoding:
Text File  |  1999-07-27  |  4.2 KB  |  143 lines

  1. object TimeForm: TTimeForm
  2.   Left = 192
  3.   Top = 110
  4.   Width = 348
  5.   Height = 249
  6.   Caption = 'Network Time Demo'
  7.   Font.Color = clWindowText
  8.   Font.Height = -11
  9.   Font.Name = 'MS Sans Serif'
  10.   Font.Style = []
  11.   OnCreate = FormCreate
  12.   PixelsPerInch = 96
  13.   TextHeight = 13
  14.   object PaintBox1: TPaintBox
  15.     Left = 0
  16.     Top = 41
  17.     Width = 162
  18.     Height = 162
  19.   end
  20.   object Label2: TLabel
  21.     Left = 176
  22.     Top = 64
  23.     Width = 4
  24.     Height = 18
  25.     Font.Color = clNavy
  26.     Font.Height = -15
  27.     Font.Name = 'Arial'
  28.     Font.Style = [fsBold]
  29.     ParentFont = False
  30.   end
  31.   object Label3: TLabel
  32.     Left = 176
  33.     Top = 96
  34.     Width = 4
  35.     Height = 18
  36.     Font.Color = clNavy
  37.     Font.Height = -15
  38.     Font.Name = 'Arial'
  39.     Font.Style = [fsBold]
  40.     ParentFont = False
  41.   end
  42.   object Panel1: TPanel
  43.     Left = 0
  44.     Top = 0
  45.     Width = 340
  46.     Height = 41
  47.     Align = alTop
  48.     TabOrder = 0
  49.     object Label1: TLabel
  50.       Left = 8
  51.       Top = 14
  52.       Width = 34
  53.       Height = 13
  54.       Caption = 'Server:'
  55.     end
  56.     object ConnectButton: TSpeedButton
  57.       Left = 272
  58.       Top = 8
  59.       Width = 25
  60.       Height = 25
  61.       Hint = 'Connect'
  62.       Glyph.Data = {
  63.         76010000424D7601000000000000760000002800000020000000100000000100
  64.         04000000000000010000120B0000120B00001000000000000000000000000000
  65.         800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
  66.         FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00300130000031
  67.         00333773F77777FF7733331000909000133333377737F777FF33330098F0F890
  68.         0333337733F733F77F33370980FFF08907333373373F373373F33099FF0FFFF9
  69.         903337F3F373F33FF7F33090FFF0FF00903337F73337F37737F33099FFF0FFF9
  70.         9033373F33F7F3F33733370980F0F0890733337FF737F7337F33330098F0F890
  71.         03333F77FF3733377FFF000009999900000377777FFFFF77777F088700000008
  72.         77037F3377777773337F088887707888870373F3337773F33373307880707088
  73.         7033373FF737F73FF733337003303300733333777337FF777333333333000333
  74.         3333333333777333333333333333333333333333333333333333}
  75.       NumGlyphs = 2
  76.       ParentShowHint = False
  77.       ShowHint = True
  78.       OnClick = ConnectButtonClick
  79.     end
  80.     object CancelButton: TSpeedButton
  81.       Left = 304
  82.       Top = 8
  83.       Width = 25
  84.       Height = 25
  85.       Hint = 'Cancel'
  86.       Enabled = False
  87.       Glyph.Data = {
  88.         DE010000424DDE01000000000000760000002800000024000000120000000100
  89.         0400000000006801000000000000000000001000000000000000000000000000
  90.         80000080000000808000800000008000800080800000C0C0C000808080000000
  91.         FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
  92.         333333333333333333333333000033338833333333333333333F333333333333
  93.         0000333911833333983333333388F333333F3333000033391118333911833333
  94.         38F38F333F88F33300003339111183911118333338F338F3F8338F3300003333
  95.         911118111118333338F3338F833338F3000033333911111111833333338F3338
  96.         3333F8330000333333911111183333333338F333333F83330000333333311111
  97.         8333333333338F3333383333000033333339111183333333333338F333833333
  98.         00003333339111118333333333333833338F3333000033333911181118333333
  99.         33338333338F333300003333911183911183333333383338F338F33300003333
  100.         9118333911183333338F33838F338F33000033333913333391113333338FF833
  101.         38F338F300003333333333333919333333388333338FFF830000333333333333
  102.         3333333333333333333888330000333333333333333333333333333333333333
  103.         0000}
  104.       NumGlyphs = 2
  105.       ParentShowHint = False
  106.       ShowHint = True
  107.       OnClick = CancelButtonClick
  108.     end
  109.     object ServerComboBox: TComboBox
  110.       Left = 48
  111.       Top = 10
  112.       Width = 217
  113.       Height = 21
  114.       ItemHeight = 13
  115.       Items.Strings = (
  116.         'time-a.nist.gov'
  117.         'time-b.nist.gov'
  118.         'time-nw.nist.gov'
  119.         'time-a.timefreq.bldrdoc.gov'
  120.         'time-b.timefreq.bldrdoc.gov'
  121.         'utcnist.colorado.edu')
  122.       TabOrder = 0
  123.       Text = 'ServerComboBox'
  124.     end
  125.   end
  126.   object StatusBar: TStatusBar
  127.     Left = 0
  128.     Top = 203
  129.     Width = 340
  130.     Height = 19
  131.     Panels = <>
  132.     SimplePanel = True
  133.   end
  134.   object msClientSocket1: TmsClientSocket
  135.     OnConnected = msClientSocket1Connected
  136.     OnDisconnected = msClientSocket1Disconnected
  137.     Port = 37
  138.     OnConnecting = msClientSocket1Connecting
  139.     Left = 280
  140.     Top = 160
  141.   end
  142. end
  143.